home *** CD-ROM | disk | FTP | other *** search
/ Aminet 3 / Aminet 3 - July 1994.iso / Aminet / misc / emu / APCNames12a.lha / APCNames / Sources.Unix / APCNames.c next >
Encoding:
C/C++ Source or Header  |  1994-01-07  |  12.4 KB  |  431 lines
  1. /* $Revision Header *** Header built automatically - do not edit! ***********
  2.  *
  3.  *    (C) Copyright 1993 by Rainer Koppler
  4.  *
  5.  *    Name .....: APCNames.c
  6.  *    Created ..: Friday 5-Mar-93 19:31:41
  7.  *    Revision .: 6
  8.  *
  9.  *    Date        Author                 Comment
  10.  *    =========   ====================   ====================
  11.  *    07-Dec-93   Rainer Koppler         enhanced encoding of long names
  12.  *    23-Sep-93   Rainer Koppler         "S:APCNames.types" support added
  13.  *    09-Sep-93   Rainer Koppler         Symantec C++ support added
  14.  *    15-Jul-93   Rainer Koppler         MS-Word support added
  15.  *    23-Mar-93   Rainer Koppler         Bug fix: multiple periods handled
  16.  *      17-Mar-93   Rainer Koppler         Bug fix: disk entry only at root level
  17.  *    05-Mar-93   Rainer Koppler         Created this file!
  18.  *
  19.  ****************************************************************************
  20.  *
  21.  *      Utility for creating original file names for MS-DOS file names
  22.  *      from the APCINFO.DAT file created by the Mac tool AccessPC.
  23.  *
  24.  * $Revision Header ********************************************************/
  25.  
  26. #include "APCNames.h"
  27. #include "Types.h"
  28. #include <stdio.h>
  29. #include <stdlib.h>
  30. #include <string.h>
  31. #include <ctype.h>
  32.  
  33. #ifndef AMIGA
  34. extern int strnicmp (char *, char *, int);
  35. extern int stricmp (char *, char *);
  36. #endif
  37.  
  38. /*-------------------------------------------------------------------
  39. **  SetPattern/NextEntry are my own Amiga-specific pattern-matching
  40. **   routines. I suppose there is no need for them for UNIX... :^)
  41. **-------------------------------------------------------------------
  42. */
  43.  
  44. #ifdef AMIGA
  45. #include "Wildcard.h"
  46. #else
  47. #ifndef SEEK_SET
  48. #define    SEEK_SET    0
  49. #define    SEEK_CUR    1
  50. #define    SEEK_END    2
  51. #endif
  52. #ifndef EXIT_FAILURE
  53. #define EXIT_FAILURE 1
  54. #endif
  55. static char *fnDummy;
  56. static void  SetPattern (char *fileName)
  57. { 
  58.   fnDummy = fileName;
  59. }
  60. static char *NextEntry (void)
  61. {  
  62.   char *fn = fnDummy;
  63.   fnDummy = NULL;
  64.   return fn;
  65. }
  66. #endif
  67.  
  68.  
  69. /*-------------------------------------------------------------------
  70. **  Each APCINFO.DAT file consists of several records denoting
  71. **  disk or file entries. Each record has a length of 80 bytes.
  72. **  The first record always denotes a disk entry, all subsequent
  73. **  records are file entries.
  74. **  After each 12 entries there are 64 bytes with undefined contents.
  75. **-------------------------------------------------------------------
  76. */
  77.  
  78. #define APC_ENTRY_SIZE  sizeof(union APCEntry)
  79. #define APC_PAD_SIZE    0x40
  80.  
  81. union APCEntry {
  82.  
  83.   UBYTE    ae_Data[80];
  84.  
  85.   struct DiskEntry {
  86.     UBYTE  de_Length;        /*length of disk name*/
  87.     UBYTE  de_Pad[79];       /*disk name and other data*/
  88.   } de;
  89.  
  90.   struct FileEntry {
  91.     UBYTE  fe_Length;        /*length of file name*/
  92.     char   fe_Name[31];      /*file name characters*/
  93.     ULONG  fe_Type;          /*Macintosh type ID*/
  94.     ULONG  fe_Creator;       /*Macintosh creator ID*/
  95.     UBYTE  fe_Pad1[23];      /*undocumented data*/
  96.     UBYTE  fe_Flags;         /*file visible <=> 0 (?)*/
  97.     char   fe_MSDOSName[8];  /*file name padded with blanks*/
  98.     char   fe_MSDOSExt[3];   /*extension padded with blanks*/
  99.     UBYTE  fe_Pad2[5];       /*always zero*/
  100.   } fe;
  101.  
  102. };
  103.  
  104.  
  105. /*----------------------------- global data ---------------------------------*/
  106.  
  107. static FILE *apcInfoDat;
  108. static union APCEntry *entry,*tstEntry;
  109. static char lngName[32],shtName[13],*sptr;
  110.  
  111. static const char versionStr[] = {
  112.   "\0$VER: APCNames 1.2 by Rainer Koppler (7.12.93)"
  113. };
  114.  
  115.  
  116. /*---------------- disk entry for empty disk (view by name) -----------------*/
  117.  
  118. static ULONG de_Empty[] = {
  119.   0x0A526169, 0x6E657220, 0x31001600, 0x0002A002,
  120.   0x02000000, 0x00000000, 0x00000000, 0x00000001,
  121.   0x002E0008, 0x00EA019C, 0x01000070, 0x02480200,
  122.   0xFFF8FFF0, 0x00000000, 0x00008000, 0x00000002,
  123.   0x7FA95F49, 0x6E736967, 0x6E696100, 0x00000000
  124. };
  125.  
  126. /*------------------------- universal file entry ----------------------------*/
  127.  
  128. static ULONG fe_Default[] = {
  129.   0x00000000, 0x00000000, 0x00000000, 0x00000000,
  130.   0x000D0D90, 0x0000000F, 0x000000E5, 0x000D0D90,
  131.   0x00000000, 0x00000000, 0x0100FFFF, 0xFFFF0000, /* TYPE, CREATOR, ... */
  132.   0x00000000, 0x00000000, 0x00000000, 0x00000000,
  133.   0x00000000, 0x00000000, 0x00000000, 0x00000000
  134. };
  135.  
  136.  
  137. /*---------------------------------------------------------------------------*/
  138.  
  139. static void Pas2CStr (UBYTE *ps, char *cs)
  140. {
  141.  UBYTE len = *ps;
  142.  
  143.  strncpy(cs,(char *)ps+1,len);
  144.  *(cs+len) = '\0';
  145. }
  146.  
  147. /*---------------------------------------------------------------------------*/
  148.  
  149. static void C2PasStr (char *cs, UBYTE *ps)
  150. {
  151.  UBYTE len = strlen(cs);
  152.  
  153.  strcpy((char *)ps+1,cs);
  154.  *ps = len;
  155. }
  156.  
  157. /*---------------------------------------------------------------------------*/
  158.  
  159. static void Long2Short (char *fileName)
  160. {
  161.   char *dotPtr,*lptr,ch,orgCh;
  162.   struct TCInfo *tci;
  163.   int i,stubIdx,state;
  164.   LONG fp;
  165.  
  166. /*--- copy entry template to "entry" and insert TYPE/CREATOR ---*/
  167.   memcpy(entry,fe_Default,APC_ENTRY_SIZE);
  168.   tci = TCInfoFor(fileName);
  169.   entry->fe.fe_Type = tci->tci_Type;
  170.   entry->fe.fe_Creator =tci->tci_Creator;
  171. /*--- insert original file name ---*/
  172.   C2PasStr(fileName,(UBYTE *)entry);
  173. /*--- 1. encode original file name to "shtName" (MS-DOS format) ---*/
  174.   for(i=0,sptr=shtName,lptr=fileName; i<8 && *lptr!='\0' && *lptr!='.';
  175.       sptr++,lptr++,i++)
  176.     *sptr = toupper(*lptr);
  177.   stubIdx = lptr-fileName; /* where the stub character would be placed */
  178.   if(stubIdx == 8) stubIdx--;
  179.   dotPtr = strchr(fileName,'.');
  180.   if(dotPtr) {
  181.     for(; i<8; i++,sptr++) *sptr = ' ';
  182.     for(lptr=dotPtr+1; i<11 && *lptr!='\0'; lptr++)
  183.       if(*lptr != '.') {
  184.         *sptr = toupper(*lptr);
  185.         sptr++;
  186.         i++;
  187.       }
  188.   }
  189.   for(; i<11; i++,sptr++) *sptr = ' ';
  190. /*--- 2. seek existing entry with same MS-DOS name & modify new name if so ---*/
  191.   fseek(apcInfoDat,0L,SEEK_SET);
  192.   state = 0;
  193.   orgCh = shtName[stubIdx];
  194.   while(fread(tstEntry,APC_ENTRY_SIZE,1,apcInfoDat) > 0) {
  195.     if(!strncmp(tstEntry->fe.fe_MSDOSName,shtName,11)) {
  196.       do {
  197.         if(state == 0)
  198.           ch = '&';
  199.         else if(state>=1 && state<=10)
  200.           ch = '0'+state-1;
  201.         else if(state>=11 && state<=36)
  202.           ch = 'A'+state-11;
  203.         else {
  204.           printf("*** Encoding possibilities exceeded. Try to rename some files.\n");
  205.           exit(EXIT_FAILURE);
  206.         }
  207.         state++;
  208.       } while(ch == orgCh);
  209.       shtName[stubIdx] = ch;
  210.     }
  211.     fp = ftell(apcInfoDat);
  212.     if(fp % 0x0400 == 0x03C0)
  213.       fread(tstEntry,APC_PAD_SIZE,1,apcInfoDat);
  214.   }
  215. /*--- 3. insert MS-DOS file name into entry & prepare "shtName" for rename ---*/
  216.   for(i=0,sptr=shtName,lptr=entry->fe.fe_MSDOSName; i<11; i++,sptr++,lptr++) 
  217.     *lptr = *sptr;
  218.   for(i=0,sptr=shtName,lptr=entry->fe.fe_MSDOSName; i<11; i++) {
  219.     if(i==8 && dotPtr && *(dotPtr+1)) {
  220.       *sptr = '.';
  221.       sptr++;
  222.     }
  223.     if(*lptr != ' ') {
  224.       *sptr = *lptr;
  225.       sptr++;
  226.     }
  227.     lptr++;
  228.   }
  229.   *sptr = 0;
  230. }
  231.  
  232. /*---------------------------------------------------------------------------*/
  233.  
  234. static void Short2Long (void)
  235. {
  236.   int i;
  237.   char *ptr;
  238.  
  239.   if(entry->fe.fe_Length > 31) {
  240.     *shtName = '\0'; *lngName = '\0';
  241.     return;
  242.   }
  243.   Pas2CStr((UBYTE *)entry,lngName);
  244.   sptr = shtName;
  245.   ptr = entry->fe.fe_MSDOSName;
  246.   for(i=0; i<8 && *ptr!=' '; sptr++,ptr++,i++)
  247.     *sptr = *ptr;
  248.   ptr = entry->fe.fe_MSDOSExt;
  249.   if(*ptr != ' ') {
  250.     *sptr = '.';
  251.     sptr++;
  252.   }
  253.   for(i=0; i<3 && *ptr!=' '; sptr++,ptr++,i++)
  254.     *sptr=*ptr;
  255.   *sptr = '\0';
  256. }
  257.  
  258. /*---------------------------------------------------------------------------*/
  259.  
  260. static BOOL EntryExistsFor (char *fileName)
  261. {
  262.   BOOL fnd = FALSE;
  263.   LONG fp;
  264.  
  265.   fseek(apcInfoDat,0L,SEEK_SET);
  266.   while(!fnd && fread(entry,APC_ENTRY_SIZE,1,apcInfoDat) > 0) {
  267.     Pas2CStr((UBYTE *)entry,lngName);
  268.     if(!(fnd = !stricmp(fileName,lngName))) {
  269.       fp = ftell(apcInfoDat);
  270.       if(fp % 0x0400 == 0x03C0)
  271.         fread(entry,APC_PAD_SIZE,1,apcInfoDat);
  272.     }
  273.   }
  274.   return(fnd);
  275. }
  276.  
  277. /*---------------------------------------------------------------------------*/
  278.  
  279. main (int argc, char *argv[])
  280. {
  281.   int cnt,fnCnt,total,cIdx;
  282.   char *fn,cmdBuf[80];
  283.   LONG fp;
  284.   BOOL err = FALSE,cpyFiles = FALSE;
  285.  
  286.   printf("\n»»APCNames«« - AccessPC renaming utility v1.2 for UNIX\n\n");
  287.  
  288.   if(--argc > 0) {
  289.     err = argc==1 && strcmp(argv[1],"-x") ;
  290.     if(!err) err = argc==2 && strncmp(argv[1],"-c",2);
  291.     if(!err) err = argc>2 && strncmp(argv[1],"-c",2) && (strcmp(argv[1],"-x") &&
  292.       strncmp(argv[2],"-c",2));
  293.     cpyFiles = !strcmp(argv[1],"-x");
  294.   }
  295.  
  296.   if(err) {
  297.     printf("USAGE: %s [ -x ][ -c[<config>] <file> { <file> }]\n",argv[0]);
  298.     exit(EXIT_FAILURE);
  299.   }
  300.  
  301.   if(!(entry=malloc(APC_ENTRY_SIZE*2))) {
  302.     printf("*** No memory for entry blocks.\n");
  303.     exit(EXIT_FAILURE);
  304.   }
  305.   tstEntry = entry+APC_ENTRY_SIZE;
  306.  
  307.   fnCnt = 0;
  308.   total = 0;
  309.  
  310. /*--- transform long names to short names and create/update APCINFO file ---*/
  311.   if(argc > 1) {
  312.     cIdx = strcmp(argv[1],"-x") ? 1 : 2;
  313.     if(!(apcInfoDat=fopen("APCINFO.DAT","a+"))) {
  314.       printf("*** Cannot open APCINFO.DAT for update.\n");
  315.       exit(EXIT_FAILURE);
  316.     }
  317.   /*--- if new file then create (empty) disk entry at beginning ---*/
  318.     fseek(apcInfoDat,0L,SEEK_END);
  319.     if(ftell(apcInfoDat) == 0)
  320.       fwrite(de_Empty,1,APC_ENTRY_SIZE,apcInfoDat);
  321.   /*--- configuration file specified ? ---*/
  322.     if(strlen(argv[cIdx]) > 2)
  323.       ReadTypes(argv[cIdx]+2);
  324.     else
  325.       ReadTypes(DEFAULT_CONFIG);
  326.   /*--- process file patterns ---*/
  327.     for(cnt=cIdx+1; cnt<=argc; cnt++) {
  328.       SetPattern(argv[cnt]);
  329.       while(fn = NextEntry()) {
  330.       /*--- lookup APCINFO.DAT for existing entry ---*/
  331.         if(!EntryExistsFor(fn)) {
  332.           fseek(apcInfoDat,0L,SEEK_END);
  333.           fp = ftell(apcInfoDat);
  334.           if(fp % 0x0400 == 0x03C0) {
  335.             memset(tstEntry,0,APC_PAD_SIZE);
  336.             fwrite(tstEntry,APC_PAD_SIZE,1,apcInfoDat);
  337.           }       
  338.           Long2Short(fn);
  339.           fwrite(entry,APC_ENTRY_SIZE,1,apcInfoDat);
  340.         }
  341.         else {
  342.           printf("\"%s\" already exists, ",fn);
  343.           Short2Long();
  344.         } 
  345.         if(cpyFiles) {
  346.           printf("writing \"%s\" as \"%s\" to DOS disk...",fn,shtName);
  347.           sprintf(cmdBuf,"mwrite %s %s",fn,shtName);
  348.           if(!system(cmdBuf)) {
  349.             printf("ok\n");
  350.             fnCnt++;
  351.           }
  352.           else
  353.             printf("failed\n");
  354.         }
  355.         else {
  356.           printf("renaming \"%s\" to \"%s\"...",fn,shtName);
  357.           if(!rename(fn,shtName)) {
  358.             printf("ok\n");
  359.             fnCnt++;
  360.           }
  361.           else
  362.             printf("failed\n");
  363.         }
  364.         total++;
  365.       }
  366.     }
  367.     fclose(apcInfoDat);
  368.     printf("\n%d file(s) of %d renamed successfully.\n",fnCnt,total);
  369.     if(cpyFiles && system("mwrite APCINFO.DAT APCINFO.DAT"))
  370.       printf("*** Cannot write APCINFO.DAT to DOS disk.\n");
  371.   }
  372. /*--- get contents of APCINFO file and transform short names to long names ---*/
  373.   else {
  374.     if(cpyFiles && system("mread APCINFO.DAT APCINFO.DAT"))
  375.       printf("*** Cannot access APCINFO.DAT on DOS disk.\n");
  376.     if(!(apcInfoDat=fopen("APCINFO.DAT","r"))) {
  377.       printf("*** Cannot open APCINFO.DAT for input.\n");
  378.       exit(EXIT_FAILURE);
  379.     }
  380.     cnt = 0;
  381.     while(fread(entry,APC_ENTRY_SIZE,1,apcInfoDat) > 0) {
  382.     /*--- D I S K  E N T R Y ---*/
  383.       if(entry->fe.fe_MSDOSName[1] == '©') {
  384.         Pas2CStr((UBYTE *)entry,lngName);
  385.         printf("Disk name: %s\n\n",lngName);
  386.       }
  387.     /*--- F I L E  E N T R Y ---*/
  388.       else {
  389.       /*--- create MS-DOS name and original name of entry data ---*/
  390.         Short2Long();
  391.       /*--- rename only if valid file entry ---*/
  392.         if(entry->fe.fe_Type == TYPE_TEXT || entry->fe.fe_Type == TYPE_WDBN) {
  393.           if(cpyFiles) {
  394.             printf("reading \"%s\" as \"%s\" from DOS disk...",lngName,shtName);
  395.             sprintf(cmdBuf,"mread %s %s",shtName,lngName);
  396.             if(!system(cmdBuf)) {
  397.               printf("ok\n");
  398.               fnCnt++;
  399.             }
  400.             else
  401.               printf("failed\n");
  402.           }
  403.           else {
  404.             printf("renaming \"%s\" to \"%s\"...",shtName,lngName);
  405.             if(!rename(shtName,lngName)) {
  406.               printf("ok\n");
  407.               fnCnt++;
  408.             }
  409.             else
  410.               printf("failed\n");
  411.           }
  412.           total++;
  413.         }
  414.         else
  415.           printf("ignoring \"%s\" (\"%s\")\n",shtName,lngName);
  416.       }
  417.       cnt++;
  418.     /*--- skip 64 bytes after each 12 records ---*/
  419.       if(cnt == 12) {
  420.         fread(entry,APC_PAD_SIZE,1,apcInfoDat);
  421.         cnt = 0;
  422.       }
  423.     }
  424.     fclose(apcInfoDat);
  425.     printf("\n%d file(s) of %d renamed successfully.\n",fnCnt,total);
  426.   }
  427.   FreeTypes();
  428.  
  429.   free(entry);
  430. }
  431.